EXTENDED CPC DSK File Disk-Info Spectaculator ( Track-Info R Track-Info R UFCS BAS c DISK c PLUS3DOS l1 0 0 ) Z p(6 ) c) 0 :0 :7 ::9000 (# d y,x;" ";y+1 ,x;" ";y+2 ,x;" ";y+3 ,x;" ";y+4 ,x;" ";y+5 ,x;" ";y+6 ,x;" ";y+7 ,x;" ";y+8 ,x;" ": n y,x;" ";y+1 ,x;" ";y+2 ,x;" ";y+3 ,x;" ";y+4 ,x;" ";y+5 ,x;" ";y+6 ,x;" ";y+7 ,x;" ";y+8 ,x;" ": x y,x;" ";y+1 ,x;" ";y+2 ,x;" ";y+3 ,x;" ";y+4 ,x;" ";y+5 ,x;" ";y+6 ,x;" ";y+7 ,x;" ";y+8 ,x;" ": y,x;" ";y+1 ,x;" ";y+2 ,x;" ";y+3 ,x;" ";y+4 ,x;" ";y+5 ,x;" ";y+6 ,x;" ";y+7 ,x;" ";y+8 ,x;" ": " " 0 ,0 ;" Track-Info R " B" " " " " " =""980 ""981 :2290 :980 : = 900 :#0 ;1 ,0 ;"LIVES: ";lives:start w y=10 :i=1 6Track-Info R :p(i)=5 *(i-1 ):x=p(i):100 d +20 *(i=2 ):i:valores iniciales ) y=10 :ct=1 :counter=0 6 21 ,0 ;" PRESS SPACE WHEN YOU ARE READY " " "1041 =" "1042 ! 20 ,0 ;6 ,,,,; counter=counter+1 $# counter=4 .1}L,0 .. counter=5 counter=0 :1100 L 0, =" "Ŧ="p"p(2 )=p(2 )+1 2= x=p(2 ):120 x +10 *(((x/2 ))=x/2 ) 8 p(2 )